home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / msdos / raytrace / pov / gen / lparser3 / tree06.ls < prev    next >
Text File  |  1993-11-22  |  318b  |  16 lines
  1. # --- L-System Parser/Mutator --- Lj Lapre ----------------------------------
  2. 8
  3. 30
  4. 40
  5. #
  6. A
  7. #
  8. A=aaSaaSaaSaaSaaSaaSaaSaaSaaSaaB
  9. S='(.9)!(.9)
  10. a=tF[&'(.8)!LBL|zL]>(137)[z&'(.7)!LBL|zL]>(137)
  11. B=tFL[-'(.8)!(.9)$LCL|zL]'(.9)!(.9)C
  12. C=tFL[+'(.8)!(.9)$LBL|zL]'(.9)!(.9)B
  13. #
  14. L=[~cc{+(30)f(2)-(120)f(2)-(120)f(2)}]
  15. @
  16.